home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 46 / Tiger_Disk_046_1998-01_Tiger-Crew-Disk_de_Side_B.d64 / ende V 070 (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  423b  |  11 lines
  1. 100 printchr$(147):poke53281,.:forc=3to16:poke646,c:
  2. 105 v=54272:poke54296,15:poke54273,c:  poke54278,255:poke54276,33:pokes+4,8
  3. 110 print"[147]     [192][192][192][192][192][192] aus und schluss! [192][192][192][192][192][192]     ":poke646,c+1
  4. 115 fory=cto3:printtab(y)"        e n d e";
  5. 120 print"[146][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][209][157][157][157][157][157][157][157]";:pokev+4,128
  6. 121 pokev+4,0:next:next
  7. 122 poke56325,0:    print"[157][157][157][157][157][148][148][148][148][148][148][148][148][148][148][148][148]"
  8. 125 s=49152:fora=stos+10:readx:pokea,x:next
  9. 130 data238,32,208,173,141,2,201,1,208,246,96:
  10. 135 syss
  11.